object SettingsDlg: TSettingsDlg Left = 257 Top = 122 BorderStyle = bsDialog Caption = 'Settings' ClientHeight = 286 ClientWidth = 427 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate TextHeight = 16 object Notebook: TTabbedNotebook Left = 0 Top = 0 Width = 427 Height = 286 Align = alClient PageIndex = 3 TabFont.Color = clBtnText TabFont.Height = -12 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 0 OnChange = NotebookChange object TTabPage Left = 5 Top = 45 Caption = '&Pens' object Label1: TLabel Left = 22 Top = 44 Width = 17 Height = 17 AutoSize = False Caption = '&1' FocusControl = Panel1 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 22 Top = 76 Width = 17 Height = 17 AutoSize = False Caption = '&2' FocusControl = Panel2 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 22 Top = 108 Width = 17 Height = 17 AutoSize = False Caption = '&3' FocusControl = Panel3 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 22 Top = 140 Width = 17 Height = 17 AutoSize = False Caption = '&4' FocusControl = Panel4 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 94 Top = 44 Width = 17 Height = 17 AutoSize = False Caption = '&5' FocusControl = Panel5 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 94 Top = 76 Width = 17 Height = 17 AutoSize = False Caption = '&6' Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 94 Top = 108 Width = 17 Height = 17 AutoSize = False Caption = '&7' FocusControl = Panel7 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 94 Top = 140 Width = 17 Height = 17 AutoSize = False Caption = '&8' FocusControl = Panel8 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 22 Top = 20 Width = 61 Height = 17 AutoSize = False Caption = 'Colors' end object Label10: TLabel Left = 22 Top = 176 Width = 41 Height = 17 AutoSize = False Caption = '&Width' FocusControl = Slider end object Label11: TLabel Left = 172 Top = 20 Width = 81 Height = 19 AutoSize = False Caption = '&Background' end object Bevel2: TBevel Left = 8 Top = 8 Width = 307 Height = 220 Hint = 'Please doubleclick to select the desired colors' ParentShowHint = False Shape = bsFrame ShowHint = True IsControl = True end object Slider: TSlider Left = 74 Top = 176 Width = 199 Height = 43 Hint = 'Penwidth' TrackWidth = 3 TrackColor = clBlack ThumbHeight = 20 ThumbColor = clBtnFace Orientation = slHoriz Minimum = 1 Maximum = 30 Value = 1 Ctl3D = True OnValueChange = SliderValueChange ParentShowHint = False ShowHint = True end object Panel1: TPanel Left = 42 Top = 44 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 1 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel3: TPanel Left = 42 Top = 108 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 2 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel4: TPanel Left = 42 Top = 140 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 3 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel5: TPanel Left = 114 Top = 44 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 4 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel7: TPanel Left = 114 Top = 110 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 5 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel8: TPanel Left = 114 Top = 140 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 6 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel2: TPanel Left = 42 Top = 76 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 7 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object PanelBkGnd: TPanel Left = 172 Top = 44 Width = 101 Height = 117 BevelOuter = bvLowered BevelWidth = 2 BorderWidth = 1 TabOrder = 8 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end object Panel6: TPanel Left = 114 Top = 76 Width = 21 Height = 21 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 9 TabStop = True OnClick = PanelClick OnDblClick = PanelDblClick OnEnter = PanelEnter OnExit = PanelExit end end object TTabPage Left = 5 Top = 45 Caption = 'P&orts' object Bevel1: TBevel Left = 8 Top = 8 Width = 307 Height = 220 Hint = 'Please select the appropriate port' ParentShowHint = False Shape = bsFrame ShowHint = True IsControl = True end object Label12: TLabel Left = 160 Top = 90 Width = 54 Height = 13 Caption = 'Baud Rate:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 160 Top = 146 Width = 29 Height = 13 Caption = 'Parity:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label15: TLabel Left = 160 Top = 174 Width = 44 Height = 13 Caption = 'Stop bits:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label16: TLabel Left = 160 Top = 118 Width = 45 Height = 13 Caption = 'Data bits:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label17: TLabel Left = 160 Top = 202 Width = 60 Height = 13 Caption = 'Flow control:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lbPorts: TListBox Left = 32 Top = 84 Width = 91 Height = 133 ItemHeight = 16 TabOrder = 0 end object ScanBtn: TBitBtn Left = 324 Top = 132 Width = 77 Height = 27 Caption = 'Scan' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = ScanBtnClick Kind = bkHelp Margin = 2 Spacing = -1 end object cbSendComm: TCheckBox Left = 32 Top = 58 Width = 121 Height = 17 Caption = 'Send directly' State = cbChecked TabOrder = 2 OnClick = cbSendCommClick end object cboBaud: TComboBox Left = 232 Top = 86 Width = 69 Height = 20 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 3 end object cboParity: TComboBox Left = 232 Top = 142 Width = 69 Height = 20 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 4 end object cboStop: TComboBox Left = 232 Top = 170 Width = 69 Height = 20 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 5 end object cboData: TComboBox Left = 232 Top = 114 Width = 69 Height = 20 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 6 end object cboFlow: TComboBox Left = 232 Top = 198 Width = 69 Height = 20 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 7 end object Destination: TEdit Left = 32 Top = 24 Width = 269 Height = 24 Enabled = False TabOrder = 8 end end object TTabPage Left = 5 Top = 45 Caption = '&About' object Panel9: TPanel Left = 8 Top = 8 Width = 303 Height = 220 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object ProgramIcon: TImage Left = 18 Top = 22 Width = 32 Height = 32 AutoSize = True Picture.Data = {} Stretch = True IsControl = True end object ProductName: TLabel Left = 66 Top = 16 Width = 195 Height = 13 Caption = 'MMPLOT-HPGL/2-Viewer-Printer' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False IsControl = True end object Version: TLabel Left = 66 Top = 40 Width = 43 Height = 13 Caption = 'Version' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False IsControl = True end object Copyright: TLabel Left = 16 Top = 72 Width = 263 Height = 19 Alignment = taCenter AutoSize = False Caption = 'Copyright (c)1996 MAMAVISION Software Consult' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False IsControl = True end object DLLName: TLabel Left = 24 Top = 94 Width = 73 Height = 17 AutoSize = False Caption = 'MMPlot.DLL' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False WordWrap = True IsControl = True end object Registeredfor: TLabel Left = 7 Top = 136 Width = 272 Height = 17 Alignment = taCenter AutoSize = False Caption = 'Unregistered Version' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False WordWrap = True IsControl = True end object DLLCopyright: TLabel Left = 14 Top = 114 Width = 263 Height = 19 Alignment = taCenter AutoSize = False Caption = 'Copyright (c)1996 MAMAVISION Software Consult' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False IsControl = True end object DLLVersion: TLabel Left = 100 Top = 94 Width = 66 Height = 13 Caption = 'DLLVersion' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False WordWrap = True IsControl = True end object Label14: TLabel Left = 182 Top = 94 Width = 85 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'CIS 100335,430' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False IsControl = True end object Komment: TLabel Left = 12 Top = 162 Width = 279 Height = 53 Alignment = taCenter AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False IsControl = True end end end object TTabPage Left = 5 Top = 45 Caption = '&Desktop' object Bevel3: TBevel Left = 8 Top = 8 Width = 307 Height = 220 Hint = 'Please select the appropriate port' ParentShowHint = False Shape = bsFrame ShowHint = True IsControl = True end object cbSaveSet: TCheckBox Left = 34 Top = 30 Width = 167 Height = 17 Caption = 'Save Settings on Exit' Enabled = False TabOrder = 0 end object cbShowTB: TCheckBox Left = 34 Top = 58 Width = 167 Height = 17 Caption = 'Show Toolbar' TabOrder = 1 end object cbShowNAV: TCheckBox Left = 34 Top = 84 Width = 167 Height = 17 Caption = 'Show Navigator' TabOrder = 2 end object cbAutoStretch: TCheckBox Left = 34 Top = 110 Width = 167 Height = 17 Caption = 'Automatical stretching ' TabOrder = 3 end end end object OKBtn: TBitBtn Left = 328 Top = 50 Width = 77 Height = 27 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 end object CancelBtn: TBitBtn Left = 328 Top = 82 Width = 77 Height = 27 Caption = 'Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 Kind = bkCancel Margin = 2 Spacing = -1 end object HelpBtn: TBitBtn Left = 328 Top = 114 Width = 77 Height = 27 Caption = '&Help' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False Kind = bkHelp Margin = 2 Spacing = -1 end object StdBtn: TBitBtn Left = 328 Top = 146 Width = 77 Height = 27 Caption = '&Standard' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 4 Visible = False OnClick = StdBtnClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 555555555555555555555555555555555555555555FF55555555555559055555 55555555577FF5555555555599905555555555557777F5555555555599905555 555555557777FF5555555559999905555555555777777F555555559999990555 5555557777777FF5555557990599905555555777757777F55555790555599055 55557775555777FF5555555555599905555555555557777F5555555555559905 555555555555777FF5555555555559905555555555555777FF55555555555579 05555555555555777FF5555555555557905555555555555777FF555555555555 59905555555555555777555555555555555555555555555555550000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object ColorDialog: TColorDialog Options = [cdPreventFullOpen] Left = 24 Top = 8 end end